var a,b:
TMtx;
begin
CreateIt(a,b);
try
a.SetIt (2,4,False,
[1, 2, 3, 4,
-5, 6,-7, 8] );
a.ExtendToComplex;
b.IFFT2D(a);
// result will be
[(1.5, 0), (0, -0.5), (-3.5, 0), (0, 0.5),
(1, 0), (-0.5, 0), (3, 0), (-0.5, 0) ]
finally
FreeIt(a,b);
end;
end;